[\<1] - 80 Column Lunar Object Report
 [\<2] - 132 Column Lunar Object Report
 [\<3] - Word for Windows (Lunar Object Data File)
 [\<4] - 80 Column Lunar Object Log Report
 [\<Q] - Quit to report menu
DEACTIVATE POPUP
SACPR4
Print 
cPRNf
WINDOW
NFORM_SCR
DDATE_1
DDATE_2
EXCNOTES
DEXNINDEX
NORDER
NPR_SS
DEXYESNO
CPR_GIF
CPR_PRN
OPTION
CFILE
CPR_WFW
PRINT
Ascending
Descending8
SET ORDER TO nINDEX &cORDER
INDEX ON UPPER(CLUBS)+UPPER(NAME) TO 
 FOR CLUBS <> SPACE(10)
 .AND. 
mNAME$UPPER(NAME)
 .AND. 
mSKY_TEL$UPPER(SKY_TEL)
 .AND. 
TYPE=mTYPE
 .AND. 
LON-nFAC<=mLON.AND.mLON<=LON+nFAC
 .AND. 
EW=mEW
 .AND. 
LAT-nFAC<=mLAT.AND.mLAT<=LAT+nFAC
 .AND. 
NS=mNS
 .AND. 
mCLUBS$UPPER(CLUBS)
 .AND. 
mNOTES$UPPER(NOTES)
SET FILTER TO &cD
SET FILTER TO &cD
Press [ESC] to return to main menu...
cLUN_INDEXf
CORDER
NORDER
CLUN_INDEXNINDEX
FNFILE
DEXPLSWAIT
FNTALK
_INDEXNAME
DEXMNAME
SKY_TEL
MSKY_TEL
XTYPE
MTYPE
CLUBS
MCLUBS
CNOTES
MNOTES
LUNLOG
PRINT1
PRINT2
PRINT3
PRINT4
CDATAPATH
NFORM_NDX
?? &cPR_DEF
bESC =.T.
?? &cPR_DEF
?? &cPR_BON
Page F
80 Column Lunar Object Report
Date is 
 Lunar Object Filter is 
?? &cPR_BOFF
 Name: 
Sky & Telescope #: 
 Type of Object: 
M->TYPE
 Longitude : F
99.9999c
 Latitude  : F
99.9999c
 Clubs: 
Notes: 
       
cPRNf
* * * Report Interrupted by User * * *
?? &cPR_DEF
Number of Printed Records = F
CFILE
NCOUNT
NPAGE
NPR_MAX
EXNRPT_ROW
NRPT_MAX
EXCLUN_NAME
SKY_TEL
FLD_DES
CLUBS
T_ROW
NOTES
CGIFPATH
CPR_GIF
PRINT_GIF
THERM
?? &cPR_DEF
bESC =.T.
?? &cPR_BON
Page F
132 Column Lunar Object Report
Date is 
 Lunar Object Filter is 
     Name         Sky & Tel # Type  Longitude  Latitude     Clubs    
----------------- ----------- ----- ---------- ---------- ---------- 
?? &cPR_BOFF
         
                             Notes: 
                                    
* * * Report Interrupted by User * * *
?? &cPR_DEF
Number of Printed Records = F
CFILE
NCOUNT
NPAGE
NPR_MAX
EXNRPT_ROW
NRPT_MAX
EXCLUN_NAME
SKY_TEL
CLUBS
T_ROW
NOTES
THERM
SKY_TEL
LONGITUDE
LATITUDE
NOTES
CLUBS
bESC =.T.
Number of Printed Records = F
CFILE
NCOUNT
EXNAME
SKY_TEL
XTYPE
N_NAME
NOTES
NNOTES
XCLUBS
THERM
?? &cPR_DEF
bESC =.T.
?? &cPR_DEF
?? &cPR_BON
Page F
80 Column Lunar Object Log
Date is 
 Lunar Object Filter is 
?? &cPR_BOFF
 Name: 
Sky & Telescope #: 
 Type of Object: 
M->TYPE
 Longitude : F
99.9999c
 Latitude  : F
99.9999c
 Clubs: 
 Log Date: F
Log Time: 
 Log Date: F
Log Time: 
Notes: 
       
cPRNf
* * * Report Interrupted by User * * *
?? &cPR_DEF
Number of Printed Records = F
CFILE
NCOUNT
NPAGE
NPR_MAX
EXNRPT_ROW
NRPT_MAX
EXCNAME
CSKY_TEL
SKY_TEL
LUNLOG
XCLUN_NAME
FLD_DES
CLUBS
LOG_DATE
LOG_TIME
T_ROW
NOTES
CGIFPATH
CPR_GIF
PRINT_GIF
THERM
PRINT
PRINT1
PRINT2
PRINT3
PRINT4
D:\SKY\SAC\
SACPR4.FXP
D:\SKY\SAC\SACPR4.PRG